Top 10k strings from Machine Code Tools (1982)(Phipps Associates).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
5 1982 Phipps Associates
5 "99","","0"
4 scrollright:
4 scrollleft
3 scrollleft:
3 l(di-add-2)"
3 h$=hex$(h)
3 h$=" ":
2 scrollright
2 rowcount,8
2 r$="BCDEHLMA"
2 line input
2 l(a+di)","
2 j$="CALL":
2 auto=auto+1
2 a$="Name:":
2 a$="Enter start address:":
2 TOOLKIT
2 *(a$(x)>"9"):
2 #hc;h$;" ";
2 "22","(t(1)=2)*(t(2)
2
1 x<-32768)":
1 x(p,t+j)=x-j:
1 x(p,j+j)=x-j
1 x$;" ";h$;"-";a$
1 x$(x)-48-7*(x$(x)>""9"")":
1 w$="05678RCBXQHP":
1 vet numeric
1 t3)+("SBC"
1 t3)+("INC"
1 t1)+("RETN"
1 t(2)=7","2","211","dl"
1 t(1)=7","2","219","dl"
1 t$(t)=("3"
1 t$(t)="6":
1 t$(t)="111111112222222070000005515011"(ix*15
1 scrollup=ramtop+4
1 scrollright=ramtop+8
1 scrollleft=ramtop+2
1 scrolldown=ramtop+6
1 scrolldown:
1 scrolldown
1 s$(y)=s$(y+1
1 s$(ns+u+j+j)=s$(ns+j+j,
1 s$(ns+nu+j+j,
1 s$(lx)-j):
1 s$(j+t+lx):
1 s$(j+j+lx);","
1 s$(j))=":")
1 rowcount=23681
1 rowcount,24
1 rowcount,176
1 rowcount,16
1 q$="BCDEHLSP":
1 q$="BCDE"+e$+"SP":
1 printat=ramtop
1 pack character
1 p$="BCDEHLAF":
1 p$="BCDE"+e$+"AF":
1 not present
1 no disassembler present
1 move cursor
1 maintain internal picture
1 m$="Merge source from tape?":
1 m$="Hard copy?":
1 m$="Auto scan?":
1 let z=instr(w$,a$)
1 l(a-add-2)"
1 j;"ERROR ";ec;
1 j()=(m$="JP"
1 j$=("RETI"
1 j$="PUSH":
1 j$="HALT":
1 j$="BITRESSET"((g-1
1 ix=(x$(j)="("):
1 instructions
1 initialise
1 h;" (";h$;"H)"
1 h$="("+h$+")"
1 find symbol
1 enter symbol table
1 e=j+ix-jump:
1 draw existing pattern
1 draw cursor
1 dl<8","2","203","64+dl*8+t(2)"
1 dl<8","2","203","192+dl*8+t(2)"
1 dl<8","2","203","128+dl*8+t(2)"
1 cy=cy-dy*8
1 cx=cx+dx*8
1 create operand
1 create data statements
1 create array
1 condition codes
1 column=23728
1 check type
1 charcode=23681
1 c=DD)+("IY"
1 c=253","2","2","
1 auto=auto+6
1 add=add+l+e
1 add+j+j,dis
1 a(x$(1))=0)":
1 a$=x$+" "+h$+"-":
1 a$=e$+"Which letter?":
1 a$="Save symbols on tape?":
1 a$="Load symbols from tape?":
1 a$="Hard copy (Y/N)?":
1 a$="Enter your selection:":
1 a$="Enter the tape name:":
1 a$="Enter symbols? (Y/N)":
1 a$="Enter symbol name:":
1 a$="Enter hex:":
1 a$="Enter address:":
1 a$="ENTER to continue":
1 a$="Do you want to save them?":
1 a$="Do you want to change any?":
1 ZXMCMON
1 ZXDISASM
1 ZXASM/48K
1 ZXASM 48K extension
1 ZXASM
1 ZX Spectrum Assembler
1 This allows reruns
1 TKDEMO
1 TABLET
1 Start address
1 Split opcode
1 Spectrum Disassembler
1 Sort symbols
1 START TAPE THEN PRESS A KEY
1 SCREEN
1 Reset defaults
1 Print current set
1 Phipps Associates 1982
1 Monitor Menu
1 Machine Monitor
1 Machine Code Monitor
1 MENU _
1 Line input
1 Get address in h$
1 Find op (2)
1 Find op (1)
1 Enter machine code
1 Display memory
1 DD/FD opcode
1 Current User Graphic Set
1 Created with Ramsoft MakeTZX
1 Create true address
1 Convert type
1 Convert a$(x) to binary
1 Convert a$ to address
1 Byte value
1 Auto start
1 Alter memory
1 Addr Hex Op Operands
1 Addr Hex Op Operand/Notes
1 ;x;". ";n$(x):
1 ;,,"Press a key to continue",:
1 ;,,">>> Start the tape",,,,,
1 ;"___ _________"
1 ;"X=done","B=blank all","R=invert row","C=invert col","0=set/unset","5,6,7,8=move","Q=leave alone","H=hide/unhide","P=print copy",,
1 ;"Stop the tape";
1 ;"Sorting..."
1 ;"Searching..."
1 ;"S E C R E T M E S S A G E"
1 ;"RANGE ERROR";
1 ;"Press a key to continue":
1 ;"Press a key and watch!":
1 ;"Press a key (P=print)"
1 ;"Loading """;f$;"""";
1 ;"LENGTH ERROR";
1 ;"Key Character"
1 ;"K"'"RAMTOP value : ";:
1 ;"HAVE FUN!"
1 ;"Do not adjust your set!"
1 ;"Data statement format:"
1 ;"Current character: ";a$
1 ;"Current address: ";a;" (";:
1 ;"<<<Colours do not move>>>"
1 ;"*** Tape Contents ***"
1 ;" - re-enter":
1 ;" - re-enter remainder":
1 ;" This TOOLKIT gives you"'" the power to scroll in any"'" direction and as many pixel"'" rows that you wish!"'" It is fully relocatable so"'" that you may load it where-"'" ever you want, merely alter-"'" ing the USR address to"'" invoke it."
1 6","3","t(1)*16+1","dl","dh"
1 6","2","ed","65+t(2)*8"
1 6","2","ed","64+t(1)*8"
1 56","1","199+
1 4)*(n=0)","1","9+t(2)*16"
1 4","1","3+T(1)*16"
1 4","1","11+T(1)*16"
1 3","1","197+T(1)*16-16*(T(1)=4)"
1 3","1","193+T(1)*16-16*(T(1)=4)"
1 0)","2","ed","78-n*4+t(2)*16"
1 0)","2","ed","70+16*(dl=1)+24*(dl=2)"
1 ,"RLCA","RRCA","RLA","RRA","DAA","CPL","SCF","CCF"
1 ,"RLC","RRC","RL","RR","SLA","SRA","??","SRL"
1 ,"NZ","Z","NC","C","PO","PE","P","M","","","HL","","","IX","IY"
1 ,"NOP","","","EX","AF","AF","DJNZ",
1 ,"LD","I","A","LD","R","A","LD","A","I","LD","A","R","RRD","","","RLD","",""
1 ,"LD","(BC)","A","LD","A","(BC)","LD","(DE)","A","LD","A","(DE)","LD","""(""+H$+"")""","HL","LD","HL","""(""+H$+"")""","LD","""(""+h$+"")""","A","LD","A","""(""+h$+"")"""
1 ,"JP",H$,"","??","","","OUT","("+H$+")","A","IN","A","("+H$+")","EX",E$,"(SP)","EX","DE",E$,"DI","","","EI","",""
1 ,"B","C","D","E","H","L","M","A","BC","DE","HL","SP","AF","IX","IY"
1 ,"ADD","ADC","SUB","SBC","AND","XOR","OR","CP"
1 ,"??","","","RET","","","??","","","EXX","","","??","","","JP","("+E$+")","","??","","","LD","SP",E$
1 ***** Tape Intro *****
1 *** ZX Spectrum Disassembler ***
1 *(a$(x)>"9")
1 )=a$(x(x,j)+j
1 )="("+e$+(
1 );" ";h$;:
1 ),"JR","Z",
1 ),"JR","NC",
1 ),"JR","C",
1 ),"","JR","NZ",
1 ),"","JR",
1 (x$(1)=""-""))
1 (reserved)
1 (c/64)=0","1","1","dl+
1 ''"Null Finish program"
1 '"Version 2.2 27th August 1982"
1 '"RAM available: ";(
1 '"DATA """;a$;""",";
1 '"All the values are shown in hex with the exception of relative offset values, which are shown in decimal (e.g. JR +19 or LD (IY-8),FF)."
1 '"Addresses may be entered in hex (e.g. 43a2h) or decimal, or evencertain System Variable names, like RAMTOP."
1 #hc;" ";l$;" ";h$:
1 #hc'er+n;" Error(s)"
1 #hc''"Unresolved:"
1 #hc''"Symbols:"':
1 "dl-256*(dl>127)"
1 "di-65536*(di>32767)"
1 "dd+(dd=0)*(221+32*(x=14))":
1 "ZXMCMON M/C Monitor"
1 "ZXDISASM Disassembler"
1 "ZXASM/48K"
1 "ZXASM Symbolic Assembler"
1 "TKDEMO Toolkit demo"
1 "TABLET User graphics"
1 "RLC","RRC","RL","RR","SLA","SRA","","SRL","99"
1 "RET","201","NOP","0","RLCA","7","RRCA","15","RLA","23","RRA","31","DAA","39","CPL","47","SCF","55","CCF","63","HALT","118","EXX","217","DI","243","EI","251","99",""
1 "Program names:"
1 "OUTI","OUTD","OTIR","OTDR"
1 "NZ","Z","NC","C","PO","PE","P","M"
1 "NEG","ED","68","RETN","ED","69","RETI","ED","77","RRD","ED","103","RLD","ED","121","LDI","ED","160","LDIR","ED","176","LDD","ED","168","LDDR","ED","184","CPD","ED","169","CPDR","ED","185","CPI","ED","161","CPIR","ED","177","99","",""
1 "LDI","LDD","LDIR","LDDR"
1 "INI","IND","INIR","INDR"
1 "Enter the number of your choice: ";c
1 "Enter tape name:";
1 "CPI","CPD","CPIR","CPDR"
1 "ADD","ADC","","SBC","99"
1 "99","","2100"
1 "7600770078000100"((
1 "71OUT","t(2)
1 "63JR","t(1)<4","2","32+t(1)*8","vdef*
1 "63JP","1","3","194+t(1)*8","dl","dh"
1 "63CALL","1","3","196+t(1)*8","dl","dh"
1 "60RET","1","1","192+T(1)*8"
1 "60506060607061006200621062206230"(t2*4
1 "6*(x>65535
1 "52EX","(t(1)=3)*(t(2)=2)","1","227"
1 "51LD","(t(2)=7)*(t(1)<2)","1","t(1)*16+2"
1 "42LD","t(2)=2","3","34","dl","dh"
1 "42LD","t(2)<4","4","ed","67+t(2)*16","dl","dh"
1 "41OUT","vdef
1 "41LD","t(2)=7","3","50","dl","dh"
1 "31SET","vdef
1 "31RES","vdef
1 "31BIT","vdef
1 "30RST","vdef
1 "30ORG","vdef","0"
1 "30JR","1","2","24","vdef*
1 "30JP","1","3","195","dl","dh"
1 "30IM","vdef*(dl<3)*(dl
1 "30EQU","vdef
1 "30DJNZ","1","2","16","vdef*
1 "30DEFW","vdef","2","dl","dh"
1 "30DEFB","vdef","1","dl"
1 "30CALL","1","3","205","dl","dh"
1 "30","vdef","2","198+n*8","dl"
1 "24LD","t(1)=2","3","42","dl","dh"
1 "24LD","t(1)<4","4","ed","75+t(1)*16","dl","dh"
1 "23LD","t(1)
1 "22EX","(t(1)=4)*(t(2)=4)","1","8"
1 "22EX","(t(1)=1)*(t(2)=2)","1","235"
1 "20PUSH","T(1)
1 "20POP","T(1)
1 "20INC","T(1)
1 "20DEC","T(1)
1 "2060+l2*20":
1 "2010+l*10":
1 "2000+40*(l2=0)":
1 "17IN","t(1)
1 "15LD","(t(1)=7)*(t(2)<2)","1","t(2)*16+10"
1 "14LD","t(1)=7","3","58","dl","dh"
1 "14IN","vdef
1 "13LD","vdef","2","t(1)*8+6","dl"
1 "13","t(1)=7","2","198+n*8","dl"
1 "11LD","1","1","64+T(1)*8+T(2)"
1 "11","t(1)=7","1","128+n*8+t(2)"
1 "10JP","t(1)=6","1","233"
1 "10INC","1","1","4+T(1)*8"
1 "10DEC","1","1","5+T(1)*8"
1 "10201100120013001400140016001700"(t2*4
1 "10","1","2","203","n*8+t(1)"
1 "10","1","1","128+n*8+T(1)"
1 "1","2","1","
1 "((y-2)*16+1)";s$(y,
1 "((x$(1)=""+"")
1 "''" (1) Display memory in hex"'" (2) Enter hex machine code"'" (3) Alter memory"
1 "","","SUB","","AND","XOR","OR","CP","99"
1 " (4) Disassemble memory"
1 V1.0 29th July '82
1 Toolkit Demo
1 *** ZX Spectrum Assembler ***
1 User Graphic Tablet
1 Toolkit Demo
1
1